inherited fmMergeElmCalc: TfmMergeElmCalc
  Left = 497
  Top = 340
  Caption = '12345'
  ClientHeight = 270
  ClientWidth = 493
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 13
  object laP1: TLabel
    Left = 140
    Top = 100
    Width = 21
    Height = 13
    Caption = 'laP1'
  end
  object laP2: TLabel
    Left = 140
    Top = 140
    Width = 21
    Height = 13
    Caption = 'laP2'
  end
  object laResult: TLabel
    Left = 140
    Top = 200
    Width = 38
    Height = 13
    Caption = 'laResult'
  end
  object rgCtype: TRadioGroup
    Left = 8
    Top = 8
    Width = 157
    Height = 69
    Caption = 'rgCtype'
    ItemIndex = 0
    Items.Strings = (
      'optparallel'
      'optseries')
    TabOrder = 0
    OnClick = rgEtypeClick
  end
  object rgEtype: TRadioGroup
    Left = 168
    Top = 8
    Width = 157
    Height = 69
    Caption = 'rgEtype'
    ItemIndex = 0
    Items.Strings = (
      'optres'
      'optcap')
    TabOrder = 1
    OnClick = rgEtypeClick
  end
  object edP1: TLabeledEdit
    Left = 12
    Top = 96
    Width = 121
    Height = 21
    EditLabel.Width = 25
    EditLabel.Height = 13
    EditLabel.Caption = 'edP1'
    TabOrder = 2
    OnChange = DoFieldsChange
  end
  object edP2: TLabeledEdit
    Left = 12
    Top = 136
    Width = 121
    Height = 21
    EditLabel.Width = 25
    EditLabel.Height = 13
    EditLabel.Caption = 'edP1'
    TabOrder = 3
    OnChange = DoFieldsChange
    OnKeyDown = DoPosFloatKeyPress
  end
  object edResult: TLabeledEdit
    Left = 12
    Top = 196
    Width = 121
    Height = 21
    EditLabel.Width = 42
    EditLabel.Height = 13
    EditLabel.Caption = 'edResult'
    ReadOnly = True
    TabOrder = 4
  end
  object rgCalcType: TRadioGroup
    Left = 328
    Top = 8
    Width = 157
    Height = 69
    Caption = 'rgCalcType'
    ItemIndex = 1
    Items.Strings = (
      'optcalc'
      'optfind')
    TabOrder = 5
    OnClick = rgCalcTypeClick
  end
  object btnFind: TButton
    Left = 52
    Top = 236
    Width = 75
    Height = 25
    Caption = 'btnFind'
    TabOrder = 6
    OnClick = btnFindClick
  end
  object lvList: TListView
    Left = 196
    Top = 84
    Width = 289
    Height = 177
    Columns = <
      item
        Caption = 'e1'
        Width = 70
      end
      item
        Caption = 'e2'
        Width = 70
      end
      item
        Caption = 'result'
        Width = 70
      end
      item
        Caption = 'errorprc'
      end>
    GridLines = True
    ReadOnly = True
    RowSelect = True
    SortType = stData
    TabOrder = 7
    ViewStyle = vsReport
    OnCompare = lvListCompare
  end
end
